library(Vennerable)
data(StemCell)
Vstem <- Venn(StemCell)
Tstem <- compute.Venn(Vstem)
Vennerable:::.validateDrawing(Tstem)
VennGetFaceLabels(Tstem)